home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 2 / ETO Development Tools 2.iso / Tools - Objects / MacApp / MacApp CD Release / MacApp 2.0.1 (Many Libraries) / Libraries / PrivateInterfaces / UAssociation.p next >
Encoding:
Text File  |  1990-10-25  |  815 b   |  36 lines  |  [TEXT/MPS ]
  1. { UAssociation.p }
  2. { Copyright © 1984-1990  Apple Computer, Inc.  All rights reserved. }
  3.  
  4. {$IFC UNDEFINED UsingIncludes}
  5. {$SETC UsingIncludes := FALSE}
  6. {$ENDC}
  7.  
  8. UNIT UAssociation;
  9.  
  10.     INTERFACE
  11.  
  12.         USES
  13. {$SETC __UAssociation__ := TRUE}
  14.             { • MacApp }
  15.             {$U $$Shell(MAPInterfaces)UMacAppUtilities} UMacAppUtilities,
  16.             {$U $$Shell(MAPInterfaces)UFailure} UFailure,
  17.             {$U $$Shell(MAPInterfaces)UObject} UObject,
  18.             {$U $$Shell(MAPInterfaces)UList} UList,
  19.  
  20.             { • Implementation use }
  21.             ToolUtils, Errors;
  22.  
  23. {$SETC __UAssociation__ := FALSE}
  24.             { • Include the public interface }
  25.             {$SETC _UAssociationIncludes := UsingIncludes}
  26.             {$SETC UsingIncludes := TRUE}
  27.             {$I+}
  28.             {$I $$Shell(MAPInterfaces)UAssociation.p}
  29.             {$SETC UsingIncludes := _UAssociationIncludes}
  30.  
  31.     IMPLEMENTATION
  32.  
  33.         {$I UAssociation.inc1.p}
  34.  
  35. END.
  36.